object Form1: TForm1 Left = 170 Top = 60 BorderIcons = [] BorderStyle = bsNone Caption = 'Form1' ClientHeight = 351 ClientWidth = 461 Font.Color = clWindowText Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] Position = poScreenCenter OnCreate = FormCreate PixelsPerInch = 96 TextHeight = 13 object Panel2: TPanel Left = 0 Top = 0 Width = 461 Height = 351 Align = alClient BevelInner = bvLowered BorderWidth = 3 BorderStyle = bsSingle Caption = 'Panel2' TabOrder = 1 object Image2: TImage Left = 5 Top = 5 Width = 447 Height = 337 Picture.Data = {} OnMouseMove = Image2MouseMove end object Label2: TLabel Left = 389 Top = 300 Width = 29 Height = 16 Caption = 'EXIT' Font.Color = clGray Font.Height = -13 Font.Name = 'Arial' Font.Style = [fsBold] ParentFont = False Transparent = True OnClick = Label2Click OnMouseMove = Label2MouseMove end object Label1: TLabel Left = 387 Top = 260 Width = 34 Height = 16 Caption = 'PLAY' Font.Color = clGray Font.Height = -13 Font.Name = 'Arial' Font.Style = [fsBold] ParentFont = False Transparent = True OnClick = Label1Click OnMouseMove = Label1MouseMove end object Label3: TLabel Left = 387 Top = 215 Width = 34 Height = 16 Caption = 'VIEW' Font.Color = clGray Font.Height = -13 Font.Name = 'Arial' Font.Style = [fsBold] ParentFont = False Transparent = True OnClick = Label3Click OnMouseMove = Label3MouseMove end object Label4: TLabel Left = 392 Top = 175 Width = 18 Height = 16 Caption = 'CD' Font.Color = clGray Font.Height = -13 Font.Name = 'Arial' Font.Style = [fsBold] ParentFont = False Transparent = True OnClick = Label4Click OnMouseMove = Label4MouseMove end object Panel1: TPanel Left = 8 Top = 8 Width = 105 Height = 105 BevelOuter = bvNone Caption = 'Panel1' Color = clBlack TabOrder = 0 object Image1: TImage Left = 0 Top = 0 Width = 105 Height = 105 Hint = 'Left-->Slow down; Right-->Speed up ...' Center = True ParentShowHint = False ShowHint = True OnMouseDown = Image1MouseDown end end object Panel3: TPanel Left = 22 Top = 134 Width = 129 Height = 184 BevelOuter = bvNone Caption = 'Panel3' TabOrder = 1 object Image3: TImage Left = 0 Top = 0 Width = 129 Height = 184 Align = alClient Picture.Data = {} OnMouseMove = Image3MouseMove end end object DLB: TDirectoryListBox Left = 24 Top = 120 Width = 129 Height = 33 ItemHeight = 16 TabOrder = 2 Visible = False OnChange = DLBChange end end object flb1: TFileListBox Left = 280 Top = 32 Width = 145 Height = 97 ItemHeight = 13 Mask = '*.bmp' TabOrder = 0 Visible = False end object flb2: TFileListBox Left = 24 Top = 160 Width = 129 Height = 169 Color = clTeal Ctl3D = True DragCursor = crCross ItemHeight = 13 Mask = '*.mpg' ParentCtl3D = False TabOrder = 2 Visible = False end object Timer1: TTimer Interval = 100 OnTimer = Timer1Timer Left = 336 Top = 72 end end